home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 4: GNU Archives / Linux Cubed Series 4 - GNU Archives.iso / gnu / cvs-1.8 / cvs-1 / cvs-1.8.1 / windows-NT / ndir.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-05-06  |  4.4 KB  |  223 lines
  1. /*  msd_dir.c - portable directory routines
  2.     Copyright (C) 1990 by Thorsten Ohl, td12@ddagsi3.bitnet
  3.  
  4.     This program is free software; you can redistribute it and/or modify
  5.     it under the terms of the GNU General Public License as published by
  6.     the Free Software Foundation; either version 1, or (at your option)
  7.     any later version.
  8.  
  9.     This program is distributed in the hope that it will be useful,
  10.     but WITHOUT ANY WARRANTY; without even the implied warranty of
  11.     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12.     GNU General Public License for more details.
  13.  
  14.     You should have received a copy of the GNU General Public License
  15.     along with this program; if not, write to the Free Software
  16.     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  17.  
  18.     $Header: /u/src/master/ccvs/windows-NT/ndir.c,v 1.3 1995/09/08 00:34:09 jimb Exp $
  19.  */
  20.  
  21. /* Everything non trivial in this code is from: @(#)msd_dir.c 1.4
  22.    87/11/06.  A public domain implementation of BSD directory routines
  23.    for MS-DOS.  Written by Michael Rendell ({uunet,utai}michael@garfield),
  24.    August 1897 */
  25.  
  26.  
  27. #include <io.h>
  28. #include <stdio.h>
  29. #include <stdlib.h>
  30. #include <string.h>
  31. #include <sys/types.h>
  32. #include <sys/stat.h>
  33.  
  34. #include <dos.h>
  35.  
  36. #include <ndir.h>
  37.  
  38. static void free_dircontents (struct _dircontents *);
  39.  
  40. /* find ALL files! */
  41. #define ATTRIBUTES    (_A_RDONLY | _A_HIDDEN | _A_SYSTEM | _A_SUBDIR)
  42.  
  43.  
  44.  
  45. DIR *
  46. opendir (const char *name)
  47. {
  48.   struct _finddata_t find_buf;
  49.   DIR *dirp;
  50.   struct _dircontents *dp;
  51.   char name_buf[_MAX_PATH + 1];
  52.   char *slash = "";
  53.   long hFile;
  54.  
  55.   if (!name)
  56.     name = "";
  57.   else if (*name)
  58.     {
  59.       const char *s;
  60.       int l = strlen (name);
  61.  
  62.       s = name + l - 1;
  63.       if ( !(l == 2 && *s == ':') && *s != '\\' && *s != '/')
  64.     slash = "/";    /* save to insert slash between path and "*.*" */
  65.     }
  66.  
  67.   strcat (strcat (strcpy (name_buf, name), slash), "*.*");
  68.  
  69.   dirp = (DIR *) malloc (sizeof (DIR));
  70.   if (dirp == (DIR *)0)
  71.     return (DIR *)0;
  72.  
  73.   dirp->dd_loc = 0;
  74.   dirp->dd_contents = dirp->dd_cp = (struct _dircontents *) 0;
  75.  
  76.   if ((hFile = _findfirst (name_buf, &find_buf)) < 0)
  77.     {
  78.       free (dirp);
  79.       return (DIR *)0;
  80.     }
  81.  
  82.   do
  83.     {
  84.       dp = (struct _dircontents *) malloc (sizeof (struct _dircontents));
  85.       if (dp == (struct _dircontents *)0)
  86.     {
  87.       free_dircontents (dirp->dd_contents);
  88.       return (DIR *)0;
  89.     }
  90.  
  91.       dp->_d_entry = malloc (strlen (find_buf.name) + 1);
  92.       if (dp->_d_entry == (char *)0)
  93.     {
  94.       free (dp);
  95.       free_dircontents (dirp->dd_contents);
  96.       return (DIR *)0;
  97.     }
  98.  
  99.       if (dirp->dd_contents)
  100.     dirp->dd_cp = dirp->dd_cp->_d_next = dp;
  101.       else
  102.     dirp->dd_contents = dirp->dd_cp = dp;
  103.  
  104.       strcpy (dp->_d_entry, find_buf.name);
  105.  
  106.       dp->_d_next = (struct _dircontents *)0;
  107.  
  108.     } while (!_findnext (hFile, &find_buf));
  109.  
  110.   dirp->dd_cp = dirp->dd_contents;
  111.  
  112.   _findclose(hFile);
  113.  
  114.   return dirp;
  115. }
  116.  
  117.  
  118. void
  119. closedir (DIR *dirp)
  120. {
  121.   free_dircontents (dirp->dd_contents);
  122.   free ((char *) dirp);
  123. }
  124.  
  125.  
  126. struct direct *
  127. readdir (DIR *dirp)
  128. {
  129.   static struct direct dp;
  130.  
  131.   if (dirp->dd_cp == (struct _dircontents *)0)
  132.     return (struct direct *)0;
  133.   dp.d_namlen = dp.d_reclen =
  134.     strlen (strcpy (dp.d_name, dirp->dd_cp->_d_entry));
  135. #if 0 /* JB */
  136.   strlwr (dp.d_name);        /* JF */
  137. #endif
  138.   dp.d_ino = 0;
  139.   dirp->dd_cp = dirp->dd_cp->_d_next;
  140.   dirp->dd_loc++;
  141.  
  142.   return &dp;
  143. }
  144.  
  145.  
  146. void
  147. seekdir (DIR *dirp, long off)
  148. {
  149.   long i = off;
  150.   struct _dircontents *dp;
  151.  
  152.   if (off < 0)
  153.     return;
  154.   for (dp = dirp->dd_contents; --i >= 0 && dp; dp = dp->_d_next)
  155.     ;
  156.   dirp->dd_loc = off - (i + 1);
  157.   dirp->dd_cp = dp;
  158. }
  159.  
  160.  
  161. long
  162. telldir (DIR *dirp)
  163. {
  164.   return dirp->dd_loc;
  165. }
  166.  
  167.  
  168. /* Garbage collection */
  169.  
  170. static void
  171. free_dircontents (struct _dircontents *dp)
  172. {
  173.   struct _dircontents *odp;
  174.  
  175.   while (dp)
  176.     {
  177.       if (dp->_d_entry)
  178.     free (dp->_d_entry);
  179.       dp = (odp = dp)->_d_next;
  180.       free (odp);
  181.     }
  182. }
  183.  
  184.  
  185. #ifdef TEST
  186.  
  187. void main (int argc, char *argv[]);
  188.  
  189. void
  190. main (int argc, char *argv[])
  191. {
  192.   static DIR *directory;
  193.   struct direct *entry = (struct direct *)0;
  194.  
  195.   char *name = "";
  196.  
  197.   if (argc > 1)
  198.     name = argv[1];
  199.  
  200.   directory = opendir (name);
  201.  
  202.   if (!directory)
  203.     {
  204.       fprintf (stderr, "can't open directory `%s'.\n", name);
  205.       exit (2);
  206.     }
  207.  
  208.   while (entry = readdir (directory))
  209.     printf ("> %s\n", entry->d_name);
  210.  
  211.   printf ("done.\n");
  212. }
  213.  
  214. #endif /* TEST */
  215.  
  216. /* 
  217.  * Local Variables:
  218.  * mode:C
  219.  * ChangeLog:ChangeLog
  220.  * compile-command:make
  221.  * End:
  222.  */
  223.